object fmComment: TfmComment Left = 397 Top = 320 Width = 450 Height = 250 HelpContext = 300 BorderIcons = [biSystemMenu] Caption = 'Comment' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate DesignSize = ( 442 221) PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 83 Height = 13 Caption = 'Archive Comment' end object meComment: TMemo Left = 8 Top = 24 Width = 346 Height = 189 Anchors = [akLeft, akTop, akRight, akBottom] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ScrollBars = ssVertical TabOrder = 0 OnKeyPress = meCommentKeyPress end object buClose: TButton Left = 361 Top = 24 Width = 75 Height = 25 Anchors = [akTop, akRight] Cancel = True Caption = '&Close' Default = True ModalResult = 1 TabOrder = 1 OnClick = buCloseClick end object buClear: TButton Left = 361 Top = 88 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = 'Cl&ear' TabOrder = 2 OnClick = buClearClick end object bbSave: TBitBtn Left = 361 Top = 56 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = '&Save' Enabled = False TabOrder = 3 OnClick = bbSaveClick end object buHelp: TButton Left = 361 Top = 120 Width = 75 Height = 25 Anchors = [akTop, akRight] Cancel = True Caption = '&Help' TabOrder = 4 OnClick = buHelpClick end end